home *** CD-ROM | disk | FTP | other *** search
/ Exploring Aeronautics / NASA Exploring Aeronautics.iso / pc / source / tools.dxr / page5_1_init computation.ls < prev    next >
Encoding:
Text File  |  1998-06-02  |  1.1 KB  |  25 lines
  1. global gMovie, gModule2, gMovieList
  2.  
  3. on enterFrame
  4.   resetSlate()
  5.   closeMovie()
  6.   panoBackground(0)
  7.   mStop(gMovie)
  8. end
  9.  
  10. on exitFrame
  11.   mSetDefaultHeading(gMovieList)
  12.   set aButton to mAddButton(gButtonManager, 20, "GRAY BUTTONS 4-1", "playMovie")
  13.   mAddPageObject(gModule2, aButton)
  14.   set aButton to mAddButton(gButtonManager, 21, "GRAY BUTTONS 4-2", "playMovie")
  15.   mAddPageObject(gModule2, aButton)
  16.   set aButton to mAddButton(gButtonManager, 22, "GRAY BUTTONS 4-3", "playMovie")
  17.   mAddPageObject(gModule2, aButton)
  18.   set aButton to mAddButton(gButtonManager, 23, "GRAY BUTTONS 4-4", "playMovie")
  19.   mAddPageObject(gModule2, aButton)
  20.   mAddPageObject(gModule2, new(script "rolloverAnimObjectScript", 20, "Headingpage5.1", 31, point(320, 240)))
  21.   mAddPageObject(gModule2, new(script "rolloverAnimObjectScript", 21, "Headingpage5.2", 31, point(320, 240)))
  22.   mAddPageObject(gModule2, new(script "rolloverAnimObjectScript", 22, "Headingpage5.3", 31, point(320, 240)))
  23.   mAddPageObject(gModule2, new(script "rolloverAnimObjectScript", 23, "Headingpage5.4", 31, point(320, 240)))
  24. end
  25.